﻿Public Class ErrorDlg

    Private Sub ErrorDlg_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Public Overloads Sub ShowDialog(ByVal errorMessage As String, ByVal errorTitle As String)
        Me.Text = errorTitle
        errorMessageTextBox.Text = errorMessage
        Me.ShowDialog()
    End Sub
End Class